Show prefix in can't show messages

diff --git a/which-key.el b/which-key.el
index b71498c3b0401896a1ba24ecbec46b6825407eef..20594797c8adad8312d61da3654071ce86cbe53e 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -733,13 +733,13 @@ the maximum number of lines availabel in the target buffer."
           first-page (car pages)
           first-page-str (concat prefix-string (car first-page)))
     (cond (no-room
-           (message "which-key can't show keys: The settings and/or frame size are too restrictive.")
+           (message "%s-  which-key can't show keys: Settings and/or frame size are too restrictive." prefix-keys)
            (cons 0 0))
           (max-pages-reached
            (error "error: which-key reached the maximum number of pages")
            (cons 0 0))
           ((<= (length formatted-keys) 0)
-           (message "which-key: no keys to display")
+           (message "%s-  which-key: no keys to display" prefix-keys)
            (cons 0 0))
           (t
            (if (eq which-key-popup-type 'minibuffer)